home *** CD-ROM | disk | FTP | other *** search
/ Invenzioni & Inventori / Invenzioni and Inventori (Eclectica Publishing) (1996).ISO / invenzio / nome.dir / 00040_Script_40 < prev    next >
Text File  |  1983-01-30  |  295b  |  11 lines
  1. on unlinkdll dll
  2.   if the machinetype < 255 then 
  3.     set chedir to "invenzioni:invenzio:macxob:"
  4.     set p to ".xob"
  5.   else
  6.     set chedir to (char 1 of the moviepath &":\invenzio\winxob\")
  7.     set p to ".dll"
  8.   end if
  9.   --  put chedir&dll
  10.   closexlib (chedir&dll&p)
  11. end unlinkdll